; Music of Official Father Christmas Game (1989) (Alternative Software)
; Ripped by Megachur the 10/04/2008

	write "OFFICFCG.BIN"

music_date_rip	equ &0a48
music_adr	equ &b200
first_theme	equ 0
last_theme	equ 0

	read "music_header_v1_0.asm"

	jp lb252
	jp lb286
	jp lb260
.lb209
	dw lb623,lb624,lb7c5,lb7c6
	dw lb967,lb968,lbb09,lbb0a
.lb21d equ $ + 4
.lb219
	db #00,#00,#00,#00,#00,#00,#00,#00
.lb225 equ $ + 4
.lb221
	db #00,#00,#00,#00,#00,#00,#00,#00
.lb230 equ $ + 7
.lb22e equ $ + 5
.lb22c equ $ + 3
.lb229
	db #09,#00,#00,#b3,#00,#bc,#03,#77
.lb234 equ $ + 3
.lb233 equ $ + 2
.lb232 equ $ + 1
	db #00,#09,#38,#07,#07,#03,#00,#00
.lb23e equ $ + 5
.lb23b equ $ + 2
.lb23a equ $ + 1
	db #00,#0a,#04,#04,#01,#04,#04,#01
.lb248 equ $ + 7
.lb242 equ $ + 1
.lb241
	db #00,#00,#00,#00,#00,#00,#00,#03
	db #01,#04,#00,#1d,#00,#24,#02,#03
	db #06
;
.init_music
.lb252
;
	ld a,#09
	ld (lb4c2),a
	ld hl,lb209
	call lb4ee
	jp lb286
;
.stop_music
.lb260
;
	ld de,#073f
.lb263
	di
	push bc
	ld b,#f4
	out (c),d
	ld b,#f6
	in a,(c)
	or #c0
	out (c),a
	and #3f
	out (c),a
	ld b,#f4
	out (c),e
	ld b,#f6
	ld c,a
	or #80
	out (c),a
	out (c),c
	pop bc
	inc d
	ei
	ret
;
.play_music
.lb286
;
	call lb2a9
.lb289
	xor a
	call lb4c9
	ld a,#01
	call lb4c9
	ld a,#02
	call lb4c9
	call lb48e
	call lb4b1
	ld hl,lb23a
	inc (hl)
	ld a,(hl)
	cp #10
	jr nz,lb289
	ld (hl),#00
	ret
.lb2a9
	ld hl,lb233
	ld b,#3f
	ld (hl),b
	inc hl
	ld b,#00
	call lb413
	ld hl,lb23a
	ld (hl),b
	inc hl
	call lb413
	ld hl,lb241
	ld (hl),b
	inc hl
	call lb413
	inc hl
	call lb413
	ld hl,lb225
	call lb31a
	call lb3b4
	ld hl,lb219
	call lb31a
	ld a,#01
	call lb33e
	ld hl,lb21d
	call lb31a
	ld a,#02
	call lb33e
	ld hl,lb221
	call lb31a
	ld a,#03
	call lb33e
	call lb419
	ld hl,lb22c
	ld e,(hl)
	inc hl
	ld d,(hl)
	inc hl
	call lb30b
	inc hl
	inc hl
	call lb30b
	dec hl
	dec hl
	ld e,(hl)
	inc hl
	ld d,(hl)
	inc hl
.lb30b
	ld a,(hl)
	cp e
	ret nz
	inc hl
	ld a,(hl)
	dec hl
	cp d
	ret nz
	inc de
	ld (hl),e
	inc hl
	ld (hl),d
	dec hl
	dec de
	ret
.lb31a
	ld e,(hl)
	inc hl
	ld d,(hl)
	inc de
.lb31e
	ld a,(de)
	cp #3f
	jr z,lb335
	ld b,a
	ld (hl),d
	dec hl
	ld (hl),e
	add a
	add #f7
	ld l,a
	adc #b4
	sub l
	ld h,a
	ld d,(hl)
	inc hl
	ld e,(hl)
	ex de,hl
	ld a,b
	ret
.lb335
	inc hl
	ld e,(hl)
	inc hl
	ld d,(hl)
	dec hl
	dec hl
	jp lb31e
.lb33e
	ld c,a
	ld a,b
	cp #36
	ld a,h
	jr nc,lb37e
	or l
	ret z
	ld a,c
	push hl
	add a
	dec a
	add #2c
	ld l,a
	adc #b2
	sub l
	ld h,a
	pop de
	ld (hl),e
	dec hl
	ld (hl),d
	ld hl,lb23e
	ld e,c
	ld d,#00
	dec e
	add hl,de
	ld a,(hl)
	dec hl
	dec hl
	dec hl
	ld (hl),a
	ld hl,lb229
	add hl,de
	ld a,(hl)
	ld hl,lb234
	add hl,de
	ld (hl),a
	ld hl,lb233
	ld a,c
	add #ff
	add a
	add a
	add a
	or #86
	ld (lb37c),a
.lb37c equ $ + 1
	res 0,(hl)
	ret
.lb37e
	ld (lb232),a
	ld a,l
	and #f0
	or a
	jr z,lb3a5
	rrca
	rrca
	rrca
	rrca
.lb38b
	ld hl,lb23b
	ld d,#00
	ld e,c
	add hl,de
	dec hl
	ld (hl),a
	ld hl,lb233
	ld a,c
	add #02
	add a
	add a
	add a
	or #86
	ld (lb3a3),a
.lb3a3 equ $ + 1
	res 0,(hl)
	ret
.lb3a5
	ld a,l
	and #0f
	ld hl,lb234
	ld d,#00
	ld e,c
	add hl,de
	dec hl
	ld (hl),a
	xor a
	jr lb38b
.lb3b4
	ld a,b
	and #03
	ld c,a
	bit 2,b
	jr nz,lb3c1
	bit 3,b
	jr nz,lb3ec
	ret
.lb3c1
	bit 3,b
	jr nz,lb402
	ld a,#f0
	and b
	rrca
	rrca
	rrca
	rrca
	ld b,a
	xor a
	cp c
	ld hl,lb229
	jr z,lb3e4
	ld d,a
	ld e,c
	add hl,de
	dec hl
	ld (hl),b
	ld b,a
.lb3da
	ld a,#3d
	add c
	ld l,a
	adc #b2
	sub l
	ld h,a
	ld (hl),b
	ret
.lb3e4
	call lb413
	ld b,#00
	jp lb410
.lb3ec
	ld a,c
	ld (lb248),a
	ld a,#f0
	and b
	rlca
	rlca
	rlca
	bit 4,b
	ld b,a
	jr z,lb3fe
	xor #7f
	inc a
.lb3fe
	ld (lb241),a
	ret
.lb402
	bit 4,b
	ret nz
	ld a,#e0
	and b
	rlca
	rlca
	rlca
	ld b,a
	xor a
	cp c
	jr nz,lb3da
.lb410
	ld hl,lb23e
.lb413
	ld (hl),b
	inc hl
	ld (hl),b
	inc hl
	ld (hl),b
	ret
.lb419
	ld hl,lb241
	xor a
	cp (hl)
	ret z
	ld b,(hl)
	ld a,(lb248)
	or a
	jr z,lb43d
	ld ix,lb22c
	ld hl,lb219
	dec a
	jr z,lb458
	ld hl,lb21d
	ld ix,lb22e
	dec a
	jr z,lb458
	jp lb451
.lb43d
	ld hl,lb219
	ld ix,lb22c
	call lb458
	ld ix,lb22e
	ld hl,lb21d
	call lb458
.lb451
	ld ix,lb230
	ld hl,lb221
.lb458
	ld e,(hl)
	inc hl
	ld d,(hl)
	ld a,(de)
	add b
	cp #35
	ret nc
	add a
	add #f7
	ld l,a
	adc #b4
	sub l
	ld h,a
	ld e,(hl)
	inc hl
	ld d,(hl)
	ld l,(ix+#00)
	ld h,(ix+#01)
	ex de,hl
	xor a
	sbc hl,de
	ld a,l
	ld l,h
	ld h,a
	xor a
	push bc
	ld b,#04
.lb47c
	or a
	rr h
	rr l
	rr a
	djnz lb47c
	or h
	ld (ix+#16),a
	ld (ix+#17),l
	pop bc
	ret
.lb48e
	ld hl,lb22c
	ld de,lb242
	ld b,#03
.lb496
	ld a,(hl)
	push hl
	inc hl
	ld h,(hl)
	ld l,a
	ex de,hl
	ld a,(hl)
	inc hl
	push hl
	ld h,(hl)
	ld l,a
	add hl,de
	jr nc,lb4a5
	inc hl
.lb4a5
	ld c,h
	ld a,l
	pop de
	inc de
	pop hl
	ld (hl),a
	inc hl
	ld (hl),c
	inc hl
	djnz lb496
	ret
.lb4b1
	ld b,#0b
	ld hl,lb22c
	ld d,#00
.lb4b8
	ld e,(hl)
	inc hl
	call lb263
	djnz lb4b8
	ld b,#f0
.lb4c2 equ $ + 1
.lb4c1
	ld c,#04
.lb4c3
	dec c
	jr nz,lb4c3
	djnz lb4c1
	ret
.lb4c9
	ld hl,lb234
	ld c,a
	ld e,a
	ld d,#00
	add hl,de
	ex de,hl
	ld l,#07
	add hl,de
	ld a,(hl)
	or a
	ret z
	push de
	ld hl,lb58b
	dec a
	rla
	rla
	rla
	rla
	ld d,#00
	ld e,a
	add hl,de
	ld a,(lb23a)
	ld e,a
	add hl,de
	ld a,(hl)
	pop hl
	ld (hl),a
	ret
.lb4ee
	ld de,lb219
	ld bc,#0010
	ldir
	ret
	dw #03bc,#0386,#0353,#0324
	dw #02f6,#02cc,#02a4,#027e
	dw #025a,#0238,#0218,#01fa
	dw #01de,#01c3,#01aa,#0192
	dw #017b,#0166,#0152,#013f
	dw #012d,#011c,#010c,#00fd
	dw #00ef,#00e1,#00d5,#00c9
	dw #00be,#00b3,#00a9,#009f
	dw #0096,#008e,#0086,#007f
	dw #0077,#0071,#006a,#0064
	dw #005f,#0059,#0054,#0050
	dw #004b,#0047,#0043,#003f
	dw #003c,#0038,#0035,#0032
	dw #002f,#0000
	db #04,#08,#14,#08,#1f,#08,#09,#70
	db #1f,#70,#0a,#07,#11,#07,#1c,#07
	db #09,#40,#0b,#0d,#0c,#ef,#00,#50
	db #1c,#3c,#0b,#0d,#00,#00,#00,#10
	db #00,#00,#00,#00,#00,#00,#00,#00
.lb58b
	db #07,#09,#0a,#0b,#0c,#0c,#0d,#0d
	db #0d,#0c,#0b,#0a,#09,#08,#07,#06
	db #0d,#0c,#0b,#0a,#09,#08,#07,#06
	db #05,#04,#03,#02,#01,#00,#00,#00
	db #06,#07,#08,#09,#0c,#0e,#0f,#0e
	db #0d,#0c,#09,#08,#07,#06,#04,#02
	db #0d,#0c,#0b,#0a,#0a,#09,#09,#08
	db #08,#07,#07,#06,#05,#04,#03,#02
	db #0b,#0f,#0f,#0f,#0e,#0e,#0e,#0e
	db #0e,#0e,#0e,#0e,#0e,#0e,#0c,#0a
	db #0a,#09,#08,#07,#06,#06,#06,#06
	db #06,#07,#08,#09,#0a,#0a,#0a,#0a
	db #0d,#0d,#0d,#0d,#0d,#0d,#0d,#0d
	db #0d,#0d,#0d,#0d,#0d,#0d,#0d,#0b
	db #04,#08,#14,#08,#1f,#08,#09,#70
	db #1f,#70,#0a,#07,#11,#07,#1c,#07
	db #09,#40,#0b,#0d,#0c,#ef,#00,#50
	db #1c,#3c,#0b,#0d,#00,#00,#00,#10
	db #00,#00,#00,#00,#00,#00,#00,#00
.lb624 equ $ + 1
.lb623
	db #35,#1a,#23,#21,#1f,#1a,#1a,#35
	db #1a,#1a,#23,#21,#1f,#1c,#1c,#35
	db #1c,#1c,#24,#23,#21,#1e,#1e,#35
	db #26,#26,#26,#24,#21,#23,#23,#35
	db #1a,#1a,#23,#21,#1f,#1a,#1a,#35
	db #1a,#1a,#23,#21,#1f,#1c,#1c,#35
	db #1c,#1c,#24,#23,#21,#26,#26,#26
	db #26,#28,#26,#24,#21,#1f,#1f,#35
	db #35,#23,#23,#23,#35,#23,#23,#23
	db #35,#23,#26,#1f,#21,#23,#24,#23
	db #21,#24,#24,#24,#24,#24,#23,#23
	db #23,#23,#21,#21,#23,#21,#35,#26
	db #35,#23,#23,#23,#35,#23,#23,#23
	db #35,#23,#26,#1f,#21,#23,#1f,#21
	db #23,#24,#24,#24,#24,#24,#23,#23
	db #23,#26,#26,#24,#21,#1f,#1f,#1f
	db #35,#24,#24,#24,#22,#21,#21,#1f
	db #1f,#1d,#1d,#1f,#1f,#21,#21,#1d
	db #1d,#1f,#21,#22,#1f,#21,#21,#21
	db #1f,#1d,#35,#1c,#35,#1d,#1d,#35
	db #35,#24,#24,#24,#22,#21,#21,#35
	db #1f,#1d,#35,#1f,#35,#21,#21,#1d
	db #35,#1f,#21,#22,#1f,#21,#21,#35
	db #1f,#1d,#35,#1c,#35,#1d,#1d,#35
	db #35,#1f,#35,#35,#21,#22,#35,#1f
	db #35,#21,#35,#35,#22,#24,#35,#1f
	db #35,#21,#22,#24,#35,#26,#28,#29
	db #35,#28,#35,#26,#35,#24,#24,#35
	db #35,#24,#24,#35,#22,#21,#35,#1f
	db #35,#1d,#35,#1f,#35,#21,#21,#21
	db #35,#26,#26,#26,#26,#24,#24,#24
	db #22,#21,#21,#1f,#1f,#1d,#1d,#35
	db #35,#35,#13,#17,#13,#17,#1f,#35
	db #13,#17,#13,#17,#1f,#35,#13,#17
	db #13,#17,#1f,#35,#13,#17,#13,#17
	db #1f,#35,#13,#17,#13,#17,#1f,#35
	db #13,#18,#13,#1c,#1f,#35,#15,#19
	db #15,#1c,#35,#35,#15,#1a,#15,#1e
	db #21,#35,#13,#17,#13,#17,#1f,#35
	db #13,#18,#13,#1c,#1f,#35,#15,#18
	db #15,#1e,#1c,#1f,#13,#17,#13,#35
	db #35,#13,#17,#1a,#17,#13,#0e,#12
	db #15,#1a,#15,#12,#0e,#0c,#10,#13
	db #18,#17,#15,#13,#12,#1f,#35,#35
	db #0e,#13,#17,#1a,#35,#1a,#17,#12
	db #15,#1a,#15,#12,#15,#0c,#0c,#0c
	db #0e,#0e,#0e,#12,#12,#12,#12,#13
	db #13,#17,#17,#1a,#1a,#07,#07,#07
	db #07,#35,#35,#35,#35,#35,#35,#35
	db #35,#35,#35,#35,#35,#35,#35,#35
	db #35,#35,#35,#35,#35,#35,#35,#35
	db #35,#35,#35,#35,#35,#35,#35,#35
.lb7c6 equ $ + 3
.lb7c5 equ $ + 2
	db #35,#3f,#35,#35,#35,#35,#35,#35
	db #35,#35,#35,#35,#35,#35,#35,#35
	db #35,#35,#35,#35,#35,#35,#35,#35
	db #35,#35,#35,#35,#35,#35,#35,#35
	db #35,#35,#35,#35,#35,#35,#35,#35
	db #35,#35,#35,#35,#35,#35,#35,#35
	db #35,#35,#35,#35,#35,#35,#35,#35
	db #35,#35,#35,#35,#35,#35,#35,#35
	db #35,#35,#35,#1f,#1f,#1f,#35,#1f
	db #1f,#1f,#35,#1f,#23,#1a,#35,#1f
	db #1f,#1e,#1a,#1c,#1c,#1c,#1c,#1c
	db #1a,#1a,#1a,#19,#19,#19,#19,#1a
	db #35,#35,#35,#1f,#1f,#1f,#1f,#1f
	db #1f,#1f,#35,#1f,#23,#1a,#35,#1f
	db #1a,#1e,#1f,#1c,#1c,#1c,#1c,#1c
	db #1a,#1a,#1a,#1e,#1e,#1e,#1c,#1a
	db #1a,#1a,#35,#21,#21,#21,#1f,#1d
	db #1d,#1c,#1c,#1d,#1d,#1c,#1c,#1d
	db #1d,#35,#35,#10,#35,#35,#35,#1d
	db #35,#35,#35,#21,#35,#1f,#35,#21
	db #21,#35,#35,#21,#21,#21,#1f,#1d
	db #1d,#35,#1c,#1d,#35,#22,#35,#1d
	db #35,#18,#35,#1c,#1d,#1f,#1c,#1d
	db #1d,#35,#22,#21,#35,#1f,#35,#21
	db #21,#35,#35,#1c,#35,#35,#35,#35
	db #35,#35,#35,#1d,#35,#35,#35,#35
	db #35,#1c,#35,#1d,#35,#35,#35,#1d
	db #35,#35,#35,#1f,#35,#1d,#35,#1c
	db #1c,#35,#35,#21,#21,#35,#1f,#1d
	db #35,#1c,#35,#21,#35,#22,#35,#24
	db #24,#1d,#35,#1d,#35,#35,#35,#1d
	db #35,#35,#35,#1d,#35,#1d,#35,#21
	db #21,#35,#35,#35,#35,#35,#35,#35
	db #35,#35,#35,#35,#35,#35,#35,#35
	db #35,#35,#35,#35,#35,#35,#35,#35
	db #35,#1a,#1a,#1f,#35,#1f,#21,#1f
	db #1d,#1c,#35,#1c,#35,#1c,#35,#21
	db #35,#21,#23,#21,#1f,#1e,#35,#1e
	db #35,#1e,#35,#23,#35,#23,#24,#23
	db #21,#1f,#35,#1c,#35,#1a,#1a,#1c
	db #35,#21,#35,#1e,#35,#1f,#1f,#1f
	db #1f,#1a,#35,#1f,#35,#1f,#35,#1f
	db #35,#1e,#1e,#1e,#35,#1e,#35,#1f
	db #35,#1e,#35,#1c,#35,#1a,#1a,#1a
	db #35,#21,#35,#23,#35,#21,#1f,#1e
	db #1c,#26,#35,#1a,#35,#1a,#1a,#1c
	db #1c,#1c,#21,#21,#21,#1e,#1e,#1e
	db #1e,#1f,#1f,#1f,#1f,#1f,#1f,#1f
	db #1f,#1f,#1f,#35,#35,#35,#35,#35
	db #35,#35,#35,#35,#35,#35,#35,#35
	db #35,#35,#35,#35,#35,#35,#35,#35
	db #35,#35,#35,#35,#35,#35,#35,#35
.lb968 equ $ + 5
.lb967 equ $ + 4
	db #35,#35,#35,#3f,#35,#13,#35,#0e
	db #35,#13,#35,#0e,#35,#13,#35,#0e
	db #35,#0c,#35,#07,#35,#09,#35,#10
	db #35,#0e,#35,#09,#35,#0e,#35,#15
	db #35,#13,#35,#0e,#35,#13,#35,#0e
	db #35,#13,#35,#0e,#35,#13,#35,#0e
	db #35,#18,#35,#13,#35,#15,#35,#1c
	db #35,#1a,#35,#15,#35,#1a,#35,#15
	db #35,#13,#35,#0e,#35,#13,#35,#0e
	db #35,#13,#35,#0e,#35,#13,#35,#0e
	db #35,#13,#35,#0e,#35,#0c,#35,#07
	db #35,#13,#35,#0e,#35,#15,#35,#10
	db #35,#0e,#35,#09,#35,#13,#35,#0e
	db #35,#13,#35,#0e,#35,#13,#35,#0e
	db #35,#13,#35,#0e,#35,#0c,#35,#07
	db #35,#13,#35,#0e,#35,#0e,#35,#09
	db #35,#13,#13,#13,#35,#11,#35,#35
	db #35,#0c,#35,#35,#35,#11,#35,#0c
	db #35,#11,#35,#35,#35,#0c,#35,#35
	db #35,#11,#35,#35,#35,#11,#35,#0c
	db #35,#11,#35,#35,#35,#11,#35,#35
	db #35,#0c,#35,#35,#35,#11,#35,#0c
	db #35,#11,#35,#35,#35,#0c,#35,#35
	db #35,#11,#35,#35,#35,#11,#35,#0c
	db #35,#11,#35,#35,#35,#0c,#35,#35
	db #35,#0c,#35,#35,#35,#11,#35,#35
	db #35,#0c,#35,#35,#35,#11,#35,#35
	db #35,#0e,#35,#35,#35,#0c,#35,#0b
	db #35,#0c,#35,#35,#35,#11,#35,#35
	db #35,#0c,#35,#35,#35,#11,#35,#0c
	db #35,#11,#35,#35,#35,#0a,#35,#35
	db #35,#11,#35,#35,#35,#11,#35,#0c
	db #35,#11,#35,#35,#35,#07,#35,#35
	db #35,#35,#35,#07,#35,#35,#35,#35
	db #35,#07,#35,#35,#35,#35,#35,#07
	db #35,#35,#35,#35,#35,#07,#35,#35
	db #35,#0b,#35,#0c,#35,#35,#35,#0c
	db #35,#09,#35,#35,#35,#10,#21,#0e
	db #35,#35,#35,#0c,#35,#07,#35,#35
	db #35,#0e,#35,#0c,#35,#35,#35,#0b
	db #35,#09,#35,#35,#35,#0e,#35,#07
	db #35,#35,#35,#35,#35,#23,#21,#23
	db #35,#23,#35,#21,#35,#21,#35,#21
	db #35,#24,#24,#35,#24,#24,#35,#23
	db #21,#23,#35,#35,#35,#07,#35,#35
	db #0b,#0c,#35,#0e,#35,#0e,#35,#35
	db #0d,#10,#10,#10,#12,#12,#12,#35
	db #35,#35,#35,#23,#23,#23,#23,#23
	db #23,#23,#23,#23,#23,#35,#35,#35
	db #35,#35,#35,#35,#35,#35,#35,#35
	db #35,#35,#35,#35,#35,#35,#35,#35
	db #35,#35,#35,#35,#35,#35,#35,#35
.lbb0a equ $ + 7
.lbb09 equ $ + 6
	db #35,#35,#35,#35,#35,#3f,#00,#8d
	db #c6,#c7,#00,#c5,#00,#00,#8d,#00
	db #00,#00,#00,#c5,#00,#00,#8d,#00
	db #00,#00,#00,#c5,#00,#00,#8d,#00
	db #00,#00,#00,#c5,#00,#00,#8d,#00
	db #00,#00,#00,#c5,#00,#00,#8d,#00
	db #00,#00,#00,#c5,#00,#00,#8d,#00
	db #00,#00,#00,#c5,#00,#00,#8d,#00
	db #00,#00,#00,#c5,#00,#00,#00,#8d
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #00,#00,#00,#c5,#00,#00,#00,#00
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #00,#00,#00,#00,#00,#00,#00,#00
	db #00,#00,#00,#00,#00,#00,#00,#00
;
.game_name
	db "Official Father Christmas Game",0
.game_year
	db "1989",0
.game_publisher
	db "Alternative Software",0
.music_author
	db "",0
.music_comment
	db "",0

	read "music_end_v1_0.asm"
